﻿Public Class WebForm1
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub


    Private Function addTwoNumbers(ByVal firstNumberStr As String, ByVal secondNumberStr As String) As String
        Dim firstNumber, secondNumber As Single
        firstNumber = CSng(firstNumberStr)
        secondNumber = CSng(secondNumberStr)
        Dim result As Single
        result = firstNumber + secondNumber
        Return CStr(result)
    End Function

    Protected Sub btnAdd_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnAdd.Click
        lblAnswer.Text = addTwoNumbers(txtFirstNumber.Text, txtSecondNumber.Text)
    End Sub
End Class